home *** CD-ROM | disk | FTP | other *** search
/ PC Users 8 / Cd Pc Users extra 8.iso / prog / inst / firstimp / vcimpres.z / FirstImp.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1997-11-07  |  2.5 KB  |  74 lines
  1. VERSION 5.00
  2. Object = "{335C3C4F-E3F2-11D0-87E8-00A0C903B29D}#5.0#0"; "VCFI5.OCX"
  3. Begin VB.Form ChartForm 
  4.    Appearance      =   0  'Flat
  5.    BackColor       =   &H00C0C0C0&
  6.    Caption         =   "First Impression Chart"
  7.    ClientHeight    =   3570
  8.    ClientLeft      =   5610
  9.    ClientTop       =   2775
  10.    ClientWidth     =   3870
  11.    BeginProperty Font 
  12.       Name            =   "MS Sans Serif"
  13.       Size            =   8.25
  14.       Charset         =   0
  15.       Weight          =   700
  16.       Underline       =   0   'False
  17.       Italic          =   0   'False
  18.       Strikethrough   =   0   'False
  19.    EndProperty
  20.    ForeColor       =   &H80000008&
  21.    Icon            =   "FirstImp.frx":0000
  22.    LinkTopic       =   "Form1"
  23.    MDIChild        =   -1  'True
  24.    PaletteMode     =   1  'UseZOrder
  25.    ScaleHeight     =   3570
  26.    ScaleWidth      =   3870
  27.    Begin VtChartLib.VtChart VtChart1 
  28.       Height          =   3615
  29.       Left            =   120
  30.       TabIndex        =   0
  31.       Top             =   0
  32.       Width           =   3735
  33.       _ExtentX        =   6588
  34.       _ExtentY        =   6376
  35.       _0              =   $"FirstImp.frx":030A
  36.       _1              =   $"FirstImp.frx":0710
  37.       _2              =   $"FirstImp.frx":0B15
  38.       _3              =   $"FirstImp.frx":0F1A
  39.       _4              =   $"FirstImp.frx":131F
  40.       _5              =   $"FirstImp.frx":1725
  41.       _6              =   $"FirstImp.frx":1B2A
  42.       _7              =   $"FirstImp.frx":1F2F
  43.       _8              =   $"FirstImp.frx":2334
  44.       _9              =   $"FirstImp.frx":2739
  45.       _10             =   $"FirstImp.frx":2B3E
  46.       _11             =   $"FirstImp.frx":2F43
  47.       _12             =   $"FirstImp.frx":3348
  48.       _13             =   $"FirstImp.frx":374D
  49.       _count          =   14
  50.       _ver            =   1
  51.    End
  52. Attribute VB_Name = "ChartForm"
  53. Attribute VB_GlobalNameSpace = False
  54. Attribute VB_Creatable = False
  55. Attribute VB_PredeclaredId = True
  56. Attribute VB_Exposed = False
  57. Option Explicit
  58. Private Sub Form_Load()
  59.    Top = 0
  60.    Left = 0
  61.    Width = MDIForm1.ScaleWidth
  62.    Height = MDIForm1.ScaleHeight
  63.    VtChart1.chartType = VtChChartType2dBar
  64.    MDIForm1.mnuChart2DBar.Checked = True
  65. End Sub
  66. Private Sub Form_Resize()
  67.    VtChart1.Repaint = False
  68.    VtChart1.Top = 50
  69.    VtChart1.Left = 50
  70.    VtChart1.Width = ScaleWidth - 100
  71.    VtChart1.Height = ScaleHeight - 100
  72.    VtChart1.Repaint = True
  73. End Sub
  74.